home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / security / cops / cops_104 / bug_cmp next >
Encoding:
Text File  |  1992-03-10  |  1.3 KB  |  57 lines
  1. #
  2. # $0 "bug_name" "fix_date" "cur_date" "cert_advisory_number" \
  3. #        "real_date" "greater_than_date"
  4. #
  5. #  Dates are like "day month year"; e.g.  "6 Dec 1991"
  6. #
  7. { 
  8. word_smithing="could have a hole/bug"
  9. month["Jan"] =  1;
  10. month["Feb"] =  2;
  11. month["Mar"] =  3;
  12. month["Apr"] =  4;
  13. month["May"] =  5;
  14. month["Jun"] =  6;
  15. month["Jul"] =  7;
  16. month["Aug"] =  8;
  17. month["Sep"] =  9;
  18. month["Oct"] = 10;
  19. month["Nov"] = 11;
  20. month["Dec"] = 12;
  21.  
  22. bug_name     = $1
  23.  
  24. fix_day      = $2
  25. fix_month    = month[$3]
  26. fix_year     = $4
  27. # want to accept YY or YYYY. breaks in 2088.  Thanks, wietse!
  28. if (fix_year < 88) fix_year += 2000
  29. else if (fix_year < 100) fix_year += 1900
  30.  
  31. cur_day      = $5
  32. cur_month    = month[$6]
  33. cur_year     = $7
  34. cert_advis   = $8
  35. real_month   = month[$9]
  36. real_year    = $10
  37. great_day    = $11
  38. great_month  = month[$12]
  39. great_year   = $13
  40.  
  41. if (index(cur_year, ":")) {
  42.     if (cur_month > real_month)
  43.         cur_year = real_year - 1
  44.     else
  45.         cur_year = real_year
  46.     }
  47.  
  48. # print "bug-in-question", bug_name
  49. # print "fix-DATES", fix_month, fix_day, fix_year
  50. # print "cur-DATES", cur_month, cur_day, cur_year
  51. # print "real-DATE", real_month, real_year
  52.  
  53. if ((cur_year < fix_year) || ((cur_year==fix_year) && (cur_month < fix_month)) || ((cur_year==fix_year) && (cur_month==fix_month) && cur_day < fix_day))
  54.     printf("Warning!  %s %s!  (%s)\n", bug_name, word_smithing, cert_advis)
  55.  
  56. }
  57.